← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 15:57:08 2022
Reported on Wed Dec 14 16:00:34 2022

Filename(eval 265)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 66 statements in 201µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
282154µs54µsJSON::Schema::Modern::Document::::metaschema_uri JSON::Schema::Modern::Document::metaschema_uri
11114µs55µsJSON::Schema::Modern::Document::::BEGIN@5.116 JSON::Schema::Modern::Document::BEGIN@5.116
1115µs5µsMethod::Generate::Accessor::_Generated::::BEGIN@10.117Method::Generate::Accessor::_Generated::BEGIN@10.117
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
221µs my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
311µs my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4 package JSON::Schema::Modern::Document;
5255µs296µs
# spent 55µs (14+41) within JSON::Schema::Modern::Document::BEGIN@5.116 which was called: # once (14µs+41µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 55µs making 1 call to JSON::Schema::Modern::Document::BEGIN@5.116 # spent 41µs making 1 call to warnings::unimport
6
# spent 54µs within JSON::Schema::Modern::Document::metaschema_uri which was called 28 times, avg 2µs/call: # 14 times (28µs+0s) by JSON::Schema::Modern::Document::traverse at line 192 of JSON/Schema/Modern/Document.pm, avg 2µs/call # 14 times (26µs+0s) by JSON::Schema::Modern::Document::traverse at line 178 of JSON/Schema/Modern/Document.pm, avg 2µs/call
sub metaschema_uri {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 5µs within Method::Generate::Accessor::_Generated::BEGIN@10.117 which was called: # once (5µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1111µs $^H = 1762;
1210s ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1314µs %^H = (
14 );
15150µs15µs}
16# END quote_sub PRELUDE
172818µs Carp::croak("metaschema_uri is a read-only accessor") if @_ > 1;
182864µs$_[0]->{"metaschema_uri"} }
1912µs $$_UNQUOTED = \&metaschema_uri;
20}
2115µs1;
22
23;